home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 22 / AACD 22.iso / AACD / Programming / powerd / lib / powerd.lha / powerd_ppc / StrLen.ass < prev    next >
Encoding:
Text File  |  1980-05-20  |  197 b   |  16 lines
  1.  
  2. # StrLen(r3:PTR TO CHAR)(r3:LONG)
  3.  
  4.     .text
  5.     .global    _StrLen
  6.  
  7. _StrLen:    subi    r4,r3,1
  8. .loop:    lbzu    r0,1(r4)
  9.     cmpwi    r0,0
  10.     bne    .loop
  11.     sub    r3,r4,r3
  12.     blr
  13.  
  14.     .type    _StrLen,@function
  15.     .size    _StrLen,$-_StrLen
  16.